home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / x / volume2 / x11.3 / patch6 < prev    next >
Encoding:
Internet Message Format  |  1989-01-10  |  51.5 KB
  1. Path: uunet!wyse!mikew
  2. From: mikew@wyse.wyse.com (Mike Wexler)
  3. Newsgroups: comp.sources.x
  4. Subject: v02i083:  X11 Release 3, Patch6
  5. Message-ID: <1979@wyse.wyse.com>
  6. Date: 11 Jan 89 00:01:38 GMT
  7. Organization: Wyse Technology, San Jose
  8. Lines: 1833
  9. Approved: mikew@wyse.com
  10.  
  11. Submitted-by: jim@expo.lcs.mit.edu (Jim Fulton)
  12. Posting-number: Volume 2, Issue 83
  13. Archive-name: x11.3/patch6
  14.  
  15.  
  16.  
  17.                Created on Monday, 9 January 1989
  18.  
  19.                   PART 2 of 3
  20.  
  21.  
  22. Fixes 5, 6, and 7 are part of a single update to the xman program.  Together
  23. they affect the following files:
  24.  
  25.     clients/xman/CHANGES
  26.     clients/xman/README
  27.     clients/xman/ScrollByL.c
  28.     clients/xman/TODO
  29.     clients/xman/buttons.c
  30.     clients/xman/defs.h
  31.     clients/xman/globals.c
  32.     clients/xman/globals.h
  33.     clients/xman/handler.c
  34.     clients/xman/help.c
  35.     clients/xman/main.c
  36.     clients/xman/man.c
  37.     clients/xman/man.h
  38.     clients/xman/menu.c
  39.     clients/xman/misc.c
  40.     clients/xman/pages.c
  41.     clients/xman/search.c
  42.     clients/xman/tkfuncs.c
  43.     clients/xman/version.h
  44.     clients/xman/xman.help
  45.     clients/xman/xman.man
  46.  
  47. To apply these fixes, concatenate all three files and pipe them to patch -p0
  48. from the top of your X sources:
  49.  
  50.     %  cat fix5 fix6 fix7 | patch -p0
  51.  
  52.  
  53. The following is fix6 (you will also need fix5 and fix7):
  54.  
  55.  
  56.  
  57. *** /tmp/,RCSt1a17133    Fri Jan  6 18:56:28 1989
  58. --- clients/xman/ScrollByL.c    Fri Jan  6 18:41:48 1989
  59. ***************
  60. *** 1,8 ****
  61.   /*
  62.    * xman - X window system manual page display program.
  63.    *
  64. !  * $XConsortium: ScrollByL.c,v 1.4 88/10/17 20:21:12 swick Exp $
  65. !  * $oHeader: ScrollByL.c,v 4.0 88/08/31 22:11:02 kit Exp $
  66.    *
  67.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  68.    *
  69. --- 1,8 ----
  70.   /*
  71.    * xman - X window system manual page display program.
  72.    *
  73. !  * $XConsortium: ScrollByL.c,v 1.5 89/01/06 18:41:40 kit Exp $
  74. !  * $Header: ScrollByL.c,v 1.5 89/01/06 18:41:40 kit Exp $
  75.    *
  76.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  77.    *
  78. ***************
  79. *** 21,27 ****
  80.    */
  81.   
  82.   #if ( !defined(lint) && !defined(SABER))
  83. !   static char rcs_version[] = "$Athena: ScrollByL.c,v 4.0 88/08/31 22:11:02 kit Exp $";
  84.   #endif
  85.   
  86.   /*
  87. --- 21,27 ----
  88.    */
  89.   
  90.   #if ( !defined(lint) && !defined(SABER))
  91. !   static char rcs_version[] = "$Athena: ScrollByL.c,v 4.5 88/12/19 13:46:04 kit Exp $";
  92.   #endif
  93.   
  94.   /*
  95. ***************
  96. *** 30,36 ****
  97.    * and do it much more like the Viewport widget in the Athena widget set.
  98.    * But this works and time is short, so here it is.
  99.    *
  100. !  *                                     Chris Peterson 1/30/88
  101.    */
  102.   
  103.   #include    <X11/IntrinsicP.h>
  104. --- 30,41 ----
  105.    * and do it much more like the Viewport widget in the Athena widget set.
  106.    * But this works and time is short, so here it is.
  107.    *
  108. !  *                                     Chris D. Peterson 1/30/88
  109. !  * 
  110. !  * I removed all the code for horizontal scrolling here, since is was a crock
  111. !  * anyway.
  112. !  * 
  113. !  *                                     Chris D. Peterson 11/13/88
  114.    */
  115.   
  116.   #include    <X11/IntrinsicP.h>
  117. ***************
  118. *** 59,65 ****
  119.   static XtResource resources[] = {
  120.       {XtNforeground, XtCForeground, XtRPixel, sizeof(Pixel),
  121.        XtOffset(ScrollByLineWidget, scroll_by_line.foreground), 
  122. !          XtRString, "Black"},
  123.       {XtNinnerWidth, XtCWidth, XtRInt, sizeof(int),
  124.        XtOffset(ScrollByLineWidget, scroll_by_line.inner_width), 
  125.            XtRString, "100"},
  126. --- 64,70 ----
  127.   static XtResource resources[] = {
  128.       {XtNforeground, XtCForeground, XtRPixel, sizeof(Pixel),
  129.        XtOffset(ScrollByLineWidget, scroll_by_line.foreground), 
  130. !          XtRString, "XtDefaultForeground"},
  131.       {XtNinnerWidth, XtCWidth, XtRInt, sizeof(int),
  132.        XtOffset(ScrollByLineWidget, scroll_by_line.inner_width), 
  133.            XtRString, "100"},
  134. ***************
  135. *** 69,83 ****
  136.       {XtNforceBars, XtCBoolean, XtRBoolean, sizeof(Boolean),
  137.        XtOffset(ScrollByLineWidget, scroll_by_line.force_bars),
  138.            XtRString, "FALSE"},
  139. -     {XtNallowHoriz, XtCBoolean, XtRBoolean, sizeof(Boolean),
  140. -      XtOffset(ScrollByLineWidget, scroll_by_line.allow_horiz),
  141. -          XtRString, "FALSE"},
  142.       {XtNallowVert, XtCBoolean, XtRBoolean, sizeof(Boolean),
  143.        XtOffset(ScrollByLineWidget, scroll_by_line.allow_vert),
  144.            XtRString, "FALSE"},
  145. -     {XtNuseBottom, XtCBoolean, XtRBoolean, sizeof(Boolean),
  146. -      XtOffset(ScrollByLineWidget, scroll_by_line.use_bottom),
  147. -          XtRString, "FALSE"},
  148.       {XtNuseRight, XtCBoolean, XtRBoolean, sizeof(Boolean),
  149.        XtOffset(ScrollByLineWidget, scroll_by_line.use_right),
  150.            XtRString, "FALSE"},
  151. --- 74,82 ----
  152. ***************
  153. *** 101,113 ****
  154.    *
  155.    ****************************************************************/
  156.   
  157. - static void HorizontalThumb();
  158.   static Boolean ScrollVerticalText();
  159.   static void VerticalThumb();
  160. - static void HorizontalScroll();
  161.   static void VerticalScroll();
  162.   static void Page();
  163.   static void InitializeHook();
  164.   static void Realize();
  165.   static void Resize();
  166.   static void ResetThumb();
  167. --- 100,111 ----
  168.    *
  169.    ****************************************************************/
  170.   
  171.   static Boolean ScrollVerticalText();
  172.   static void VerticalThumb();
  173.   static void VerticalScroll();
  174.   static void Page();
  175.   static void InitializeHook();
  176. + static void Initialize();
  177.   static void Realize();
  178.   static void Resize();
  179.   static void ResetThumb();
  180. ***************
  181. *** 114,120 ****
  182.   static void Redisplay();
  183.   static void ChildExpose();
  184.   static Boolean SetValues();
  185. - static int MergeArglists();
  186.   static Boolean Layout();
  187.   static XtGeometryResult GeometryManager();
  188.   static void ChangeManaged();
  189. --- 112,117 ----
  190. ***************
  191. *** 133,139 ****
  192.       /* class_initialize   */    NULL,
  193.       /* class_part_init    */    NULL,
  194.       /* class_inited       */    FALSE,
  195. !     /* initialize         */    NULL,
  196.       /* initialize_hook    */    InitializeHook,
  197.       /* realize            */    Realize,
  198.       /* actions            */    actions,
  199. --- 130,136 ----
  200.       /* class_initialize   */    NULL,
  201.       /* class_part_init    */    NULL,
  202.       /* class_inited       */    FALSE,
  203. !     /* initialize         */    Initialize,
  204.       /* initialize_hook    */    InitializeHook,
  205.       /* realize            */    Realize,
  206.       /* actions            */    actions,
  207. ***************
  208. *** 185,190 ****
  209. --- 182,189 ----
  210.   /*    Function Name: Layout
  211.    *    Description: This function lays out the scroll_by_line widget.
  212.    *    Arguments: w - the scroll_by_line widget.
  213. +  *                 key - a boolean: if true then resize the widget to the child
  214. +  *                                  if false the resize children to fit widget.
  215.    *    Returns: TRUE if successful.
  216.    */
  217.   
  218. ***************
  219. *** 196,219 ****
  220.     ScrollByLineWidget sblw = (ScrollByLineWidget) w;
  221.     Dimension width,height;    /* The size that the widget would like to be */
  222.     XtGeometryResult answer;    /* the answer from the parent. */
  223. !   Widget hbar,vbar,child;    /* The three children of this 
  224. !                        scrolled widget. */
  225.     int vbar_x,vbar_y;        /* The locations of the various elements. */
  226. !   int hbar_x,hbar_y;
  227. !   int child_x,child_y;
  228. !   int c_width,c_height;
  229.     Boolean make_bar;
  230.   
  231.     vbar = sblw->composite.children[0];
  232. !   hbar = sblw->composite.children[1];
  233. !   child = sblw->composite.children[2];
  234.     height = sblw->core.height;
  235.     width = sblw->core.width;
  236.   
  237.   /* set the initial scroll bar positions. */
  238.   
  239. !   vbar_x = vbar_y = 0;
  240. !   hbar_x = hbar_y = 0;
  241.   
  242.   /* Should I allow the vertical scrollbar to be seen */
  243.   
  244. --- 195,214 ----
  245.     ScrollByLineWidget sblw = (ScrollByLineWidget) w;
  246.     Dimension width,height;    /* The size that the widget would like to be */
  247.     XtGeometryResult answer;    /* the answer from the parent. */
  248. !   Widget vbar,child;        /* The two children of this scrolled widget. */
  249.     int vbar_x,vbar_y;        /* The locations of the various elements. */
  250. !   int child_x;
  251. !   int c_width;
  252.     Boolean make_bar;
  253.   
  254.     vbar = sblw->composite.children[0];
  255. !   child = sblw->composite.children[1];
  256.     height = sblw->core.height;
  257.     width = sblw->core.width;
  258.   
  259.   /* set the initial scroll bar positions. */
  260.   
  261. !   vbar_x = vbar_y = - vbar->core.border_width;
  262.   
  263.   /* Should I allow the vertical scrollbar to be seen */
  264.   
  265. ***************
  266. *** 238,258 ****
  267.        else
  268.          c_width = width - vbar->core.width -2 * vbar->core.border_width;
  269.   
  270. ! /* Put Scrollbar on right side if scrolled window? */
  271.   
  272.        if (sblw->scroll_by_line.use_right) {
  273.          vbar_x = width - vbar->core.width - 2 * vbar->core.border_width;
  274.          child_x = 0;
  275.        }
  276. !      else {
  277. !        child_x = vbar->core.width + 2 * vbar->core.border_width;
  278. !        vbar_x = 0;
  279. !      }
  280.      }
  281.      else {
  282.        /* Make the scroll bar dissappear, note how scroll bar is always there,
  283.           sometimes it is just that we cannot see them. */
  284. !      vbar_x = - vbar->core.width - 10;
  285.        child_x = 0;
  286.        if (key)
  287.          width = child->core.width;
  288. --- 233,251 ----
  289.        else
  290.          c_width = width - vbar->core.width -2 * vbar->core.border_width;
  291.   
  292. !      /* Put Scrollbar on right side if scrolled window? */
  293.   
  294.        if (sblw->scroll_by_line.use_right) {
  295.          vbar_x = width - vbar->core.width - 2 * vbar->core.border_width;
  296.          child_x = 0;
  297.        }
  298. !      else 
  299. !        child_x = vbar->core.width + vbar->core.border_width;
  300.      }
  301.      else {
  302.        /* Make the scroll bar dissappear, note how scroll bar is always there,
  303.           sometimes it is just that we cannot see them. */
  304. !      vbar_x = - vbar->core.width - 2 * vbar->core.border_width - 10;
  305.        child_x = 0;
  306.        if (key)
  307.          width = child->core.width;
  308. ***************
  309. *** 260,356 ****
  310.          c_width = width;
  311.      }
  312.   
  313. ! /* set the horizontal bar position. */
  314.   
  315. ! /* should we allow the horiz. scroll bar. */
  316.   
  317. !    if (sblw->scroll_by_line.allow_horiz && (child->core.width >= width ||
  318. !                     sblw->scroll_by_line.force_bars)) {
  319. !      if (key)
  320. !        height = child->core.height + hbar->core.height + 
  321. !             2 * hbar->core.border_width;
  322. !      else
  323. !        c_height = height - hbar->core.height - 2 * hbar->core.border_width;
  324.   
  325. !      hbar_x = child_x;
  326.   
  327. ! /* Should we put the scroll bar on the bottom?? */
  328.   
  329. !      if (sblw->scroll_by_line.use_bottom) {
  330. !        hbar_y = height - hbar->core.height - 2 * hbar->core.border_width;
  331. !        child_y = 0;
  332. !      }
  333. !      else {
  334. !        child_y = hbar->core.height + 2 * hbar->core.border_width;
  335. !        vbar_y = child_y;
  336. !        hbar_y = 0;
  337. !      }
  338. !    }
  339. !    else {
  340. !      /* make this scroll bar disappear. */
  341. !      hbar_y = - hbar->core.height - 10;
  342. !      child_y = 0;
  343. !      if (key)
  344. !        height = child->core.height;
  345. !      else
  346. !        c_height = height;
  347. !    }
  348.   
  349. -  /* if the windows are realized we have to move them. */
  350. - 
  351. -    if (XtIsRealized( (Widget) sblw)) {
  352. -      XtMoveWidget(hbar,hbar_x,hbar_y);
  353. -      XtMoveWidget(vbar,vbar_x,vbar_y);
  354. -      XtMoveWidget(child,child_x,child_y);
  355. - 
  356. -  /* resize the children to be the correct height or width. */
  357. - 
  358. -      XtResizeWidget(vbar,vbar->core.width,height - 
  359. -             2 * vbar->core.border_width - vbar_y,
  360. -             vbar->core.border_width);
  361. - 
  362. -      XtResizeWidget(hbar,width - hbar_x - 
  363. -             2 * hbar->core.border_width,
  364. -             hbar->core.height,hbar->core.border_width);
  365. - 
  366. -      if (!key)
  367. -        XtResizeWidget(child, (Cardinal) c_width, (Cardinal) c_height,
  368. -               child->core.border_width);
  369. - 
  370. -    }
  371. - /* 
  372. -  * If they are not realized we do not need to move them then just set their 
  373. -  * core values, this saves a bit of time. 
  374. -  */
  375. -   else {
  376. -     hbar->core.x = hbar_x;
  377. -     hbar->core.y = hbar_y;
  378. -     vbar->core.x = vbar_x;
  379. -     vbar->core.y = vbar_y;
  380. -     child->core.x = child_x;
  381. -     child->core.y = child_y;
  382. - 
  383. - /* resize the scrollbars to be the correct height or width. */
  384. - 
  385. -     XtResizeWidget(vbar,vbar->core.width,height - 
  386. -                2 * vbar->core.border_width - vbar_y,
  387. -                vbar->core.border_width);
  388. - 
  389. -     XtResizeWidget(hbar,width - hbar_x - 
  390. -                2 * hbar->core.border_width,
  391. -                hbar->core.height,hbar->core.border_width);
  392. - 
  393. -     if (!key) { 
  394. -       child->core.width = c_width;
  395. -       child->core.height = c_height;
  396. -     }
  397. -   }    
  398. - 
  399. -   height = height;
  400. -   width = width;
  401. - 
  402. - /* set the thumb size to be correct. */
  403. - 
  404.     ResetThumb( (Widget) sblw);
  405.   
  406.     answer = XtMakeResizeRequest( (Widget) sblw, width, height, &width, &height);
  407. --- 253,273 ----
  408.          c_width = width;
  409.      }
  410.   
  411. !  /* Move child and v_bar to correct location. */
  412.   
  413. !   XtMoveWidget(vbar, vbar_x, vbar_y);
  414. !   XtMoveWidget(child, child_x, 0);
  415.   
  416. !   /* resize the children to be the correct height or width. */
  417.   
  418. !   XtResizeWidget(vbar, vbar->core.width, height, vbar->core.border_width);
  419.   
  420. !   if (!key)
  421. !     XtResizeWidget(child, (Cardinal) (c_width - 20), (Cardinal) height,
  422. !            child->core.border_width);
  423.   
  424. !   /* set the thumb size to be correct. */
  425.   
  426.     ResetThumb( (Widget) sblw);
  427.   
  428.     answer = XtMakeResizeRequest( (Widget) sblw, width, height, &width, &height);
  429. ***************
  430. *** 378,388 ****
  431.   {
  432.     float shown;
  433.     ScrollByLineWidget sblw = (ScrollByLineWidget) w;
  434. !   Widget child,vbar,hbar;
  435.   
  436.     vbar = sblw->composite.children[0];
  437. !   hbar = sblw->composite.children[1];
  438. !   child = sblw->composite.children[2];
  439.   
  440.   /* vertical */
  441.   
  442. --- 295,304 ----
  443.   {
  444.     float shown;
  445.     ScrollByLineWidget sblw = (ScrollByLineWidget) w;
  446. !   Widget child,vbar;
  447.   
  448.     vbar = sblw->composite.children[0];
  449. !   child = sblw->composite.children[1];
  450.   
  451.   /* vertical */
  452.   
  453. ***************
  454. *** 392,409 ****
  455.       shown = 1.0;
  456.   
  457.     XtScrollBarSetThumb( vbar, (float) -1, shown );
  458. - 
  459. - /* horizontal */
  460. - 
  461. -   shown = (float) child->core.width / (float) child->core.width;
  462. -   XtScrollBarSetThumb( hbar, (float) -1, shown );
  463.   }
  464.   
  465.   /*
  466.    *
  467.    * Geometry Manager - If the height of width is changed then try a new layout.
  468. ! *                    else dissallow the requwest.
  469. ! *
  470.    */
  471.   
  472.   /*ARGSUSED*/
  473. --- 308,320 ----
  474.       shown = 1.0;
  475.   
  476.     XtScrollBarSetThumb( vbar, (float) -1, shown );
  477.   }
  478.   
  479.   /*
  480.    *
  481.    * Geometry Manager - If the height of width is changed then try a new layout.
  482. !  *                    else dissallow the requwest.
  483. !  *
  484.    */
  485.   
  486.   /*ARGSUSED*/
  487. ***************
  488. *** 440,446 ****
  489.    * then I call the redisplay routine.
  490.    */
  491.   
  492. !   Redisplay(w->core.parent,event);
  493.   } /* ChildExpose */
  494.   
  495.   /*
  496. --- 351,359 ----
  497.    * then I call the redisplay routine.
  498.    */
  499.   
  500. !   if ((event->type == Expose) || (event->type == GraphicsExpose))
  501. !     Redisplay(w->core.parent, event, NULL);
  502. ! 
  503.   } /* ChildExpose */
  504.   
  505.   /*
  506. ***************
  507. *** 448,456 ****
  508.    */
  509.   
  510.   /* ARGSUSED */
  511. ! static void Redisplay(w, event)
  512.   Widget w;
  513.   XEvent *event;
  514.   {
  515.     ScrollByLineWidget sblw = (ScrollByLineWidget) w;
  516.   
  517. --- 361,370 ----
  518.    */
  519.   
  520.   /* ARGSUSED */
  521. ! static void Redisplay(w, event, region)
  522.   Widget w;
  523.   XEvent *event;
  524. + Region region;
  525.   {
  526.     ScrollByLineWidget sblw = (ScrollByLineWidget) w;
  527.   
  528. ***************
  529. *** 543,549 ****
  530.    * of scrolling has been turned off. 
  531.    */
  532.   
  533. !    if (vbar->core.x < 0)
  534.        return;
  535.   
  536.      switch ( direction ) {
  537. --- 457,463 ----
  538.    * of scrolling has been turned off. 
  539.    */
  540.   
  541. !    if (vbar->core.x < - vbar->core.border_width)
  542.        return;
  543.   
  544.      switch ( direction ) {
  545. ***************
  546. *** 555,561 ****
  547.      case 'b':
  548.      case 'B':
  549.        /* move one page backward */
  550. !      VerticalScroll(vbar,NULL, (int)  - vbar->core.height);
  551.        break;
  552.      case 'L':
  553.      case 'l':
  554. --- 469,475 ----
  555.      case 'b':
  556.      case 'B':
  557.        /* move one page backward */
  558. !      VerticalScroll(vbar,NULL,  - (int) vbar->core.height);
  559.        break;
  560.      case 'L':
  561.      case 'l':
  562. ***************
  563. *** 595,602 ****
  564.     ScrollByLineStruct sblw_struct;
  565.     Boolean move_thumb = FALSE;
  566.   
  567. -   child = sblw->composite.children[2];
  568.     vbar =  sblw->composite.children[0];
  569.   
  570.     num_lines =  child->core.height / sblw->scroll_by_line.font_height;
  571.   
  572. --- 509,516 ----
  573.     ScrollByLineStruct sblw_struct;
  574.     Boolean move_thumb = FALSE;
  575.   
  576.     vbar =  sblw->composite.children[0];
  577. +   child = sblw->composite.children[1];
  578.   
  579.     num_lines =  child->core.height / sblw->scroll_by_line.font_height;
  580.   
  581. ***************
  582. *** 613,618 ****
  583. --- 527,534 ----
  584.       max_lines = sblw->scroll_by_line.lines -
  585.        child->core.height / sblw->scroll_by_line.font_height;
  586.   
  587. +     if (max_lines < 0) max_lines = 0;
  588. + 
  589.       if ( new_line > max_lines ) {
  590.         new_line = max_lines;
  591.         move_thumb = TRUE;
  592. ***************
  593. *** 787,973 ****
  594.   
  595.   }
  596.   
  597. ! /*
  598. !  * I have not thought out the horizontal scrolling yet, I am not sure what 
  599. !  * should be done here.  This code is questionable.
  600. !  */
  601. !  
  602. ! 
  603. ! /*    Function Name: HorizontalThumb
  604. !  *    Description: This function moves the postition of the interior window
  605. !  *                   as the vertical scroll bar is moved.
  606. !  *    Arguments: w - the scrollbar widget.
  607. !  *                 junk - not used.
  608. !  *                 percent - the position of the scrollbar.
  609. !  *    Returns: none.
  610. !  */
  611. ! 
  612. ! static void
  613. ! HorizontalThumb(w,junk,percent)
  614. ! Widget w;
  615. ! caddr_t junk;
  616. ! float *percent;
  617.   {
  618. -   int x, y;
  619. -   Widget child,vbar;
  620. -   ScrollByLineWidget sblw = (ScrollByLineWidget) w->core.parent;
  621. - 
  622. -   /* reposition the client window (child[2]) */
  623. - 
  624. -   vbar =  sblw->composite.children[0];
  625. -   child = sblw->composite.children[2];
  626. - 
  627. -   x = (int) ( (0.0 - (*percent)) * ((float) child->core.width));
  628. -   y = child->core.y;
  629. - 
  630. - /* 
  631. -  * if there is a vertical scrollbar and it is on the left then 
  632. -  * allow room for it .
  633. -  */
  634. - 
  635. -   if (vbar->core.x == 0)
  636. -     x += vbar->core.width + 2 * vbar->core.border_width;
  637. - 
  638. -   XtMoveWidget(child,x,y);
  639. - }
  640. - 
  641. - /*    Function Name: HorizontalScroll
  642. -  *    Description: This function moves the postition of the interior window
  643. -  *                   as the horizontal scroll bar is moved.
  644. -  *    Arguments: w - the scrollbar widget.
  645. -  *                 junk - not used.
  646. -  *                 pos - the position of the cursor.
  647. -  *    Returns: none.
  648. -  */
  649. - 
  650. - static void
  651. - HorizontalScroll(w,junk,pos)
  652. - Widget w;
  653. - caddr_t junk;
  654. - int pos;
  655. - {
  656. -   int x, y, min_x;
  657. -   float location;
  658. -   Widget child,vbar,hbar;
  659. -   ScrollByLineWidget sblw = (ScrollByLineWidget) w->core.parent;
  660. - 
  661. -   /* reposition the client window (child[2]) */
  662. - 
  663. -   vbar =  sblw->composite.children[0];
  664. -   hbar =  sblw->composite.children[1];
  665. -   child = sblw->composite.children[2];
  666. - 
  667. -   x = child->core.x - pos;
  668. -   y = child->core.y;
  669. -   
  670. - /* 
  671. -  * Keep us in bounds.
  672. -  */
  673. - 
  674. -   if ( x > 0 ) x = 0;
  675. -   min_x = - (child->core.width - hbar->core.width - 
  676. -          2 * vbar->core.border_width);
  677. - 
  678. -   if (vbar->core.y > 0)        /* vertical scrollbar is on right.*/
  679. -     min_x -=  vbar->core.width +  2 * vbar->core.border_width;
  680. - 
  681. -   if ( x < min_x ) x = min_x;
  682. - 
  683. - /* reposition the thumb */
  684. - 
  685. -   location = 0.0 - (float) y / (float) child->core.width; 
  686. -   XtScrollBarSetThumb( hbar, location , (float) -1 );
  687. -   
  688. - /* 
  689. -  * if there is a vertical scrollbar and it is on the left then 
  690. -  * allow room for it .
  691. -  */
  692. - 
  693. -   if (vbar->core.x == 0)
  694. -     y += vbar->core.width + 2 * vbar->core.border_width;
  695. -     
  696. -   XtMoveWidget(child,x,y);    /* he's my child so I can move him. */
  697. - }
  698. - 
  699. - static void InitializeHook(new, args, num_args)
  700. -     ScrollByLineWidget new;
  701. -     ArgList args;
  702. -     Cardinal *num_args;
  703. - {
  704.     ScrollByLineWidget sblw = (ScrollByLineWidget) new;
  705. -   Widget window;        /* Window widget. */
  706. -   Arg arglist[50];        /* Must be large enough for the 
  707. -                  arglist from the scrolled widget to 
  708. -                  be added to it. */
  709. -   Cardinal scrollbar_num;    /* the number of scrollbar args. */
  710. -   Cardinal window_num;        /* the number of window args. */
  711.     
  712. !   static XtCallbackRec scrollcallback[] = { /* The scroll callback function. */
  713. !     { NULL, NULL },
  714. !     { NULL, NULL },
  715. !   };
  716. !   static XtCallbackRec thumbcallback[] = { /* The thumb callback function. */
  717. !     { NULL, NULL },
  718. !     { NULL, NULL },
  719. !   };
  720.   
  721. -   sblw->scroll_by_line.line_pointer = 0; /* initial point to line 0. */
  722. - 
  723.     if (sblw->core.height <= 0)
  724.       sblw->core.height = DEFAULT_HEIGHT;
  725.     if (sblw->core.width <= 0)
  726.       sblw->core.width = DEFAULT_WIDTH;
  727.   
  728. !   scrollbar_num = 0;  
  729. !   XtSetArg(arglist[scrollbar_num], XtNheight, 10); /* changed in layout. */
  730. !   scrollbar_num++;
  731. !   XtSetArg(arglist[scrollbar_num], XtNwidth, 16);
  732. !   scrollbar_num++;
  733. !   XtSetArg(arglist[scrollbar_num], XtNorientation, XtorientVertical);
  734. !   scrollbar_num++;
  735. !   thumbcallback[0].callback = VerticalThumb;  
  736. !   scrollcallback[0].callback = VerticalScroll;
  737. !   XtSetArg(arglist[scrollbar_num], XtNjumpProc, thumbcallback);
  738. !   scrollbar_num++;
  739. !   XtSetArg(arglist[scrollbar_num], XtNscrollProc, scrollcallback);
  740. !   scrollbar_num++;
  741.   
  742. ! /* 
  743. !  * Merge the argument lists so but have the scrollbar arglist take 
  744. !  * control when there is a discrepency this causes us to get the
  745. !  * correct height and width.
  746. !  */
  747.   
  748. -   scrollbar_num = MergeArglists(args, *num_args,arglist,scrollbar_num);
  749. - 
  750. -   XtCreateManagedWidget("Vertical Scroll Bar",
  751. -          scrollbarWidgetClass, (Widget) sblw,arglist,scrollbar_num);
  752. - 
  753. -   scrollbar_num = 0;  
  754. -   XtSetArg(arglist[scrollbar_num], XtNwidth, 10); /* changed in layout. */
  755. -   scrollbar_num++;
  756. -   XtSetArg(arglist[scrollbar_num], XtNheight, 16);
  757. -   scrollbar_num++;
  758. -   XtSetArg(arglist[scrollbar_num], XtNorientation, XtorientHorizontal);
  759. -   scrollbar_num++;
  760. -   thumbcallback[0].callback = HorizontalThumb;
  761. -   scrollcallback[0].callback = HorizontalScroll;
  762. -   XtSetArg(arglist[scrollbar_num], XtNjumpProc, thumbcallback);
  763. -   scrollbar_num++;
  764. -   XtSetArg(arglist[scrollbar_num], XtNscrollProc, scrollcallback);
  765. -   scrollbar_num++;
  766. - 
  767. - /* 
  768. -  * Merge the argument lists so but have the scrollbar arglist take 
  769. -  * control when there is a discrepency this causes us to get the
  770. -  * correct height and width.
  771. -  */
  772. - 
  773. -   scrollbar_num = MergeArglists(args, *num_args,arglist,scrollbar_num);
  774. - 
  775. -   XtCreateManagedWidget("Horizontal Scroll Bar",
  776. -          scrollbarWidgetClass, (Widget) sblw,arglist,scrollbar_num);
  777. - 
  778.     window_num = 0;  
  779.     XtSetArg(arglist[window_num], XtNwidth, sblw->scroll_by_line.inner_width); 
  780.     window_num++;
  781. --- 703,739 ----
  782.   
  783.   }
  784.   
  785. ! static void 
  786. ! Initialize(req, new)
  787. ! Widget req, new;
  788.   {
  789.     ScrollByLineWidget sblw = (ScrollByLineWidget) new;
  790.     
  791. !   sblw->scroll_by_line.line_pointer = 0; /* initially point to line 0. */
  792.   
  793.     if (sblw->core.height <= 0)
  794.       sblw->core.height = DEFAULT_HEIGHT;
  795.     if (sblw->core.width <= 0)
  796.       sblw->core.width = DEFAULT_WIDTH;
  797. + } /* Initialize. */
  798.   
  799. ! static void 
  800. ! InitializeHook(new, args, num_args)
  801. ! ScrollByLineWidget new;
  802. ! ArgList args;
  803. ! Cardinal *num_args;
  804. ! {
  805. !   ScrollByLineWidget sblw = (ScrollByLineWidget) new;
  806. !   Widget window, s_bar;        /* Window widget, and scollbar. */
  807. !   Arg arglist[10];        /* an arglist. */
  808. !   ArgList merged_list, XtMergeArgLists(); /* The merged arglist. */
  809. !   Cardinal window_num, merged_num; /* The number of window args. */
  810.   
  811. !   s_bar = XtCreateManagedWidget("verticalScrollBar", scrollbarWidgetClass,
  812. !                 (Widget) sblw, args, *num_args);
  813. !   XtAddCallback(s_bar, XtNjumpProc, VerticalThumb, NULL);
  814. !   XtAddCallback(s_bar, XtNscrollProc, VerticalScroll, NULL);
  815.   
  816.     window_num = 0;  
  817.     XtSetArg(arglist[window_num], XtNwidth, sblw->scroll_by_line.inner_width); 
  818.     window_num++;
  819. ***************
  820. *** 975,988 ****
  821.     window_num++;
  822.     XtSetArg(arglist[window_num], XtNborderWidth, 0);
  823.     window_num++;  
  824.     
  825. !   window = XtCreateWidget("Window with file",widgetClass,(Widget) sblw,arglist,
  826. !               window_num);
  827.     XtManageChild(window);
  828.   
  829. ! /* We want expose events for this window also. */
  830.   
  831. !   XtAddEventHandler(window, (Cardinal) ExposureMask, FALSE, ChildExpose, NULL);
  832.     
  833.   } /* InitializeHook */
  834.   
  835. --- 741,764 ----
  836.     window_num++;
  837.     XtSetArg(arglist[window_num], XtNborderWidth, 0);
  838.     window_num++;  
  839. + 
  840. + /* 
  841. +  * I hope this will cause my args to override those passed to the SBL widget.
  842. +  */
  843.     
  844. !   merged_list = XtMergeArgLists(args, *num_args, arglist, window_num);
  845. !   merged_num = *num_args + window_num;
  846. ! 
  847. !   window = XtCreateWidget("windowWithFile",widgetClass,(Widget) sblw,
  848. !               merged_list, merged_num);
  849.     XtManageChild(window);
  850. +   XtFree(merged_list);        /* done, free it. */
  851.   
  852. ! /*
  853. !  * We want expose (and graphic exposuer) events for this window also. 
  854. !  */
  855.   
  856. !   XtAddEventHandler(window, (Cardinal) ExposureMask, TRUE, ChildExpose, NULL);
  857.     
  858.   } /* InitializeHook */
  859.   
  860. ***************
  861. *** 1023,1078 ****
  862.   
  863.   } /* Set Values */
  864.   
  865. - /*    Function Name: MergeArglists
  866. -  *    Description: This function merges two arglists.
  867. -  *    Arguments: from,num_from - the number and list of args for the source.
  868. -  *                 to,num_to - the number and list of argument for the
  869. -  *                             destination.
  870. -  *    Returns: new number of argument in to.
  871. -  */
  872. - 
  873. - /* Note: This function will be very unhappy with you if 'to' is not
  874. -  *       large enough to contain 'from', you will end up with pointers 
  875. -  *       in space.
  876. -  */
  877. - 
  878. - static int
  879. - MergeArglists(from,num_from,to,num_to)
  880. - Arg from[],to[];
  881. - Cardinal num_from,num_to;
  882. - {
  883. -   int i,j;            /* a counter. */
  884. - 
  885. - /* When there are two similar values ignore the from value. */
  886. - 
  887. -   i = 0;
  888. -   while ( i < num_from ) {    
  889. -     j = 0;
  890. -     while ( j < num_to ) {
  891. -       if ( !strcmp(from[i].name,to[j].name) ) {
  892. -     /* if they are the same then goto next on the from list,
  893. -        i.e. ignore this entry, do not add to to list. */
  894. -     i++;
  895. -     if ( i > num_from)
  896. -       j = num_to + 100;
  897. -     else {
  898. -       j = 0;
  899. -       continue;
  900. -     }
  901. -       }
  902. -       j++;
  903. -     }
  904. -     /* add to to list */
  905. -     if (j < num_to + 100) {
  906. -       to[num_to].value = from[i].value;
  907. -       to[num_to].name = from[i].name;
  908. -       num_to++;
  909. -       i++;
  910. -     }
  911. -   }
  912. -   return(num_to);
  913. - }
  914. - 
  915.   /* Public Routines. */
  916.   
  917.   /*    Function Name: XtScrollByLineWidget()
  918. --- 799,804 ----
  919. ***************
  920. *** 1087,1093 ****
  921.   {
  922.     ScrollByLineWidget sblw = (ScrollByLineWidget) w; /* the sblw widget. */
  923.     
  924. !   return(sblw->composite.children[2]);
  925.   }
  926.   
  927.   /*    Function Name: XtResetScrollByLine
  928. --- 813,819 ----
  929.   {
  930.     ScrollByLineWidget sblw = (ScrollByLineWidget) w; /* the sblw widget. */
  931.     
  932. !   return(sblw->composite.children[1]);
  933.   }
  934.   
  935.   /*    Function Name: XtResetScrollByLine
  936. ***************
  937. *** 1114,1118 ****
  938.                (float) sblw->scroll_by_line.lines; 
  939.     XtScrollBarSetThumb( vbar, location , (float) -1 );
  940.   
  941. !   ResetThumb(w);
  942.   }
  943. --- 840,844 ----
  944.                (float) sblw->scroll_by_line.lines; 
  945.     XtScrollBarSetThumb( vbar, location , (float) -1 );
  946.   
  947. !   Layout(w, FALSE);        /* see if new layout is required. */
  948.   }
  949. *** /tmp/,RCSt1a17182    Fri Jan  6 18:56:42 1989
  950. --- clients/xman/handler.c    Fri Jan  6 18:42:02 1989
  951. ***************
  952. *** 1,7 ****
  953.   /*
  954.    * xman - X window system manual page display program.
  955.    *
  956. !  * $XConsortium: handler.c,v 1.2 88/09/06 17:47:50 jim Exp $
  957.    *
  958.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  959.    *
  960. --- 1,7 ----
  961.   /*
  962.    * xman - X window system manual page display program.
  963.    *
  964. !  * $XConsortium: handler.c,v 1.3 89/01/06 18:42:00 kit Exp $
  965.    *
  966.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  967.    *
  968. ***************
  969. *** 20,26 ****
  970.    */
  971.   
  972.   #if ( !defined(lint) && !defined(SABER))
  973. !   static char rcs_version[] = "$Athena: handler.c,v 4.0 88/08/31 22:11:58 kit Exp $";
  974.   #endif
  975.   
  976.   #include "globals.h"
  977. --- 20,26 ----
  978.    */
  979.   
  980.   #if ( !defined(lint) && !defined(SABER))
  981. !   static char rcs_version[] = "$Athena: handler.c,v 4.6 89/01/06 12:17:27 kit Exp $";
  982.   #endif
  983.   
  984.   #include "globals.h"
  985. ***************
  986. *** 84,91 ****
  987.    * I did not have a two state or toggle widget, which is the way this
  988.    * should really be done.  1/22/88 - CDP.
  989.    */
  990. -     ChangeLabel(man_globals->label,
  991. -         man_globals->section_name[man_globals->current_directory]);
  992.       if (man_globals->both_shown == TRUE) {
  993.         label_str = SHOW_BOTH;
  994.         if (man_globals->dir_shown)
  995. --- 84,89 ----
  996. ***************
  997. *** 98,104 ****
  998.         Widget dir = man_globals->manpagewidgets.directory;
  999.   
  1000.         label_str = SHOW_ONE;
  1001. !       XtPanedSetMinMax(dir,directory_height,directory_height);
  1002.         if (!man_globals->dir_shown) {
  1003.       XtUnmanageChild(manpage);
  1004.       XtManageChild(dir);
  1005. --- 96,103 ----
  1006.         Widget dir = man_globals->manpagewidgets.directory;
  1007.   
  1008.         label_str = SHOW_ONE;
  1009. !       XtPanedSetMinMax(dir, resources.directory_height, 
  1010. !                resources.directory_height);
  1011.         if (!man_globals->dir_shown) {
  1012.       XtUnmanageChild(manpage);
  1013.       XtManageChild(dir);
  1014. ***************
  1015. *** 116,121 ****
  1016. --- 115,125 ----
  1017.    * is up so very little time is wasted in the extra popdown call later.
  1018.    */
  1019.       XtPopdown( XtParent(XtParent(w)) );
  1020. +     if (man_globals->dir_shown)
  1021. +       ChangeLabel(man_globals->label,
  1022. +           man_globals->section_name[man_globals->current_directory]);
  1023. +     else
  1024. +       ChangeLabel(man_globals->label, man_globals->manpage_title);
  1025.       ChangeLabel(man_globals->both_shown_button, label_str);
  1026.       /* if both are shown there is no need to switch between the two. */
  1027.       XtSetSensitive(man_globals->put_up_manpage,!man_globals->both_shown);
  1028. ***************
  1029. *** 156,161 ****
  1030. --- 160,167 ----
  1031.   
  1032.   #define OFF_OF_TOP 25
  1033.   
  1034. + /* ARGSUSED */
  1035. + 
  1036.   void
  1037.   PopUpMenu(w,junk,event)
  1038.   Widget w;
  1039. ***************
  1040. *** 188,193 ****
  1041. --- 194,201 ----
  1042.    *    Returns: none
  1043.    */
  1044.   
  1045. + /* ARGSUSED */
  1046. + 
  1047.   void
  1048.   PopDown(w,junk,event)
  1049.   Widget w;
  1050. ***************
  1051. *** 226,232 ****
  1052.     else if ( !strcmp(Name(w),CANCEL) ) 
  1053.       file = NULL;
  1054.     else 
  1055. !     PrintWarning("Unknown widget");
  1056.   
  1057.     /* popdown the search widget */
  1058.   
  1059. --- 234,240 ----
  1060.     else if ( !strcmp(Name(w),CANCEL) ) 
  1061.       file = NULL;
  1062.     else 
  1063. !     PrintError("Unknown widget, in Search Box.");
  1064.   
  1065.     /* popdown the search widget */
  1066.   
  1067. ***************
  1068. *** 254,270 ****
  1069.     InitManpage(man_globals,man_globals->manpagewidgets.manpage,file);
  1070.     fclose(file);
  1071.     
  1072. !   if (!man_globals->both_shown) {
  1073.       XtUnmanageChild(man_globals->manpagewidgets.directory);
  1074.       XtManageChild(man_globals->manpagewidgets.manpage);
  1075. -   }
  1076. -   
  1077. -   XtSetSensitive(man_globals->both_shown_button,TRUE);
  1078. -   if (!man_globals->both_shown) {
  1079.       XtSetSensitive(man_globals->put_up_manpage,TRUE); 
  1080.       ChangeLabel(man_globals->label,man_globals->manpage_title);
  1081.       man_globals->dir_shown = FALSE;
  1082.     }
  1083.     MakeLong( XtParent(man_globals->both_shown_button) );
  1084.     XtResetScrollByLine(man_globals->manpagewidgets.manpage);
  1085.   }
  1086. --- 262,280 ----
  1087.     InitManpage(man_globals,man_globals->manpagewidgets.manpage,file);
  1088.     fclose(file);
  1089.     
  1090. !   if (man_globals->both_shown) {
  1091. !     ChangeLabel(man_globals->label, 
  1092. !         man_globals->section_name[man_globals->current_directory]);
  1093. !   }
  1094. !   else {
  1095.       XtUnmanageChild(man_globals->manpagewidgets.directory);
  1096.       XtManageChild(man_globals->manpagewidgets.manpage);
  1097.       XtSetSensitive(man_globals->put_up_manpage,TRUE); 
  1098.       ChangeLabel(man_globals->label,man_globals->manpage_title);
  1099.       man_globals->dir_shown = FALSE;
  1100.     }
  1101. + 
  1102. +   XtSetSensitive(man_globals->both_shown_button,TRUE);
  1103.     MakeLong( XtParent(man_globals->both_shown_button) );
  1104.     XtResetScrollByLine(man_globals->manpagewidgets.manpage);
  1105.   }
  1106. ***************
  1107. *** 309,314 ****
  1108. --- 319,326 ----
  1109.    *    Returns: none.
  1110.    */
  1111.   
  1112. + /* ARGSUSED */
  1113. + 
  1114.   void
  1115.   GotoManpage(w, global_pointer, event)
  1116.   Widget w;
  1117. ***************
  1118. *** 350,358 ****
  1119.     ManpageGlobals * man_globals = (ManpageGlobals *) global_pointer;
  1120.     XtListReturnStruct * ret_struct = (XtListReturnStruct *) ret_val;
  1121.   
  1122. !   file = FindFilename(man_globals, ret_struct->string,
  1123. !               man_globals->current_directory,
  1124. !      &(manual[man_globals->current_directory].entries[ret_struct->index]));
  1125.     PutUpManpage(man_globals, file);
  1126.   }
  1127.   
  1128. --- 362,369 ----
  1129.     ManpageGlobals * man_globals = (ManpageGlobals *) global_pointer;
  1130.     XtListReturnStruct * ret_struct = (XtListReturnStruct *) ret_val;
  1131.   
  1132. !   file = FindFilename(man_globals,
  1133. !      manual[man_globals->current_directory].entries[ret_struct->index]);
  1134.     PutUpManpage(man_globals, file);
  1135.   }
  1136.   
  1137. ***************
  1138. *** 378,391 ****
  1139.     int current_box;
  1140.   
  1141.     menu_struct = (MenuCallbackStruct *) pointer;
  1142. - 
  1143.     man_globals = (ManpageGlobals *) menu_struct->data;
  1144.   
  1145. -   /* The callback numbers go from 0 to n - 1 but I want from 1 to n */
  1146. - 
  1147.     number = menu_struct->number;
  1148. -   number++;
  1149. - 
  1150.     current_box = man_globals->current_directory;
  1151.   
  1152.     /* We have used this guy, pop down the menu. */
  1153. --- 389,397 ----
  1154. ***************
  1155. *** 392,407 ****
  1156.     
  1157.     if (number != current_box) {
  1158.       /* This is the only one that we know has a parent. */
  1159. !     parent = XtParent(man_globals->manpagewidgets.box[1]);
  1160.   
  1161.       MakeDirectoryBox(man_globals, parent,
  1162.                man_globals->manpagewidgets.box + number, number);
  1163.       XtUnmanageChild(man_globals->manpagewidgets.box[current_box]);
  1164.       XtManageChild(man_globals->manpagewidgets.box[number]);
  1165. !     
  1166.       man_globals->current_directory = number;
  1167.     }
  1168. -   ChangeLabel(man_globals->label, man_globals->section_name[number]);
  1169.   
  1170.     XtPopdown( XtParent(XtParent(w)) );
  1171.   
  1172. --- 398,414 ----
  1173.     
  1174.     if (number != current_box) {
  1175.       /* This is the only one that we know has a parent. */
  1176. !     parent = XtParent(man_globals->manpagewidgets.box[INITIAL_DIR]);
  1177.   
  1178.       MakeDirectoryBox(man_globals, parent,
  1179.                man_globals->manpagewidgets.box + number, number);
  1180.       XtUnmanageChild(man_globals->manpagewidgets.box[current_box]);
  1181.       XtManageChild(man_globals->manpagewidgets.box[number]);
  1182. ! 
  1183. !     XtListUnhighlight(man_globals->manpagewidgets.box[current_box]);
  1184. !     ChangeLabel(man_globals->label, man_globals->section_name[number]);
  1185.       man_globals->current_directory = number;
  1186.     }
  1187.   
  1188.     XtPopdown( XtParent(XtParent(w)) );
  1189.   
  1190. ***************
  1191. *** 422,427 ****
  1192. --- 429,436 ----
  1193.    *    Returns: none
  1194.    */
  1195.   
  1196. + /* ARGSUSED */
  1197. + 
  1198.   void
  1199.   SaveCallback(w,global_pointer,junk)
  1200.   Widget w;
  1201. ***************
  1202. *** 453,458 ****
  1203. --- 462,469 ----
  1204.    *                 junk - the callback and closure date are not used.
  1205.    *    Returns: none.
  1206.    */
  1207. + 
  1208. + /* ARGSUSED */
  1209.   
  1210.   void
  1211.   ManpageButtonPress(w,global_pointer,event)
  1212. *** /tmp/,RCSt1a17197    Fri Jan  6 18:56:47 1989
  1213. --- clients/xman/main.c    Fri Jan  6 18:42:11 1989
  1214. **************
  1215. *** 1,7 ****
  1216.   /*
  1217.    * xman - X window system manual page display program.
  1218.    *
  1219. !  * $XConsortium: main.c,v 1.3 88/10/20 10:05:04 swick Exp $
  1220.    *
  1221.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  1222.    *
  1223. --- 1,7 ----
  1224.   /*
  1225.    * xman - X window system manual page display program.
  1226.    *
  1227. !  * $XConsortium: main.c,v 1.4 89/01/06 18:42:08 kit Exp $
  1228.    *
  1229.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  1230.    *
  1231. ***************
  1232. *** 20,26 ****
  1233.    */
  1234.   
  1235.   #if ( !defined(lint) && !defined(SABER))
  1236. !   static char rcs_version[] = "$Athena: main.c,v 4.0 88/08/31 22:12:26 kit Exp $";
  1237.   #endif
  1238.   
  1239.   #include "globals.h"
  1240. --- 20,26 ----
  1241.    */
  1242.   
  1243.   #if ( !defined(lint) && !defined(SABER))
  1244. !   static char rcs_version[] = "$Athena: main.c,v 4.5 88/12/19 13:47:28 kit Exp $";
  1245.   #endif
  1246.   
  1247.   #include "globals.h"
  1248. ***************
  1249. *** 31,63 ****
  1250.   
  1251.   static void ArgError();
  1252.   
  1253. ! /* XtOffset() hack for ibmrt BandAidCompiler */
  1254.   
  1255.   static XtResource my_resources[] = {
  1256.     {"manualFontNormal", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1257. !      (Cardinal) &(fonts.normal), XtRString, MANPAGE_NORMAL},
  1258.     {"manualFontBold", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1259. !      (Cardinal) &(fonts.bold), XtRString, MANPAGE_BOLD},
  1260.     {"manualFontItalic", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1261. !      (Cardinal) &(fonts.italic), XtRString, MANPAGE_ITALIC},
  1262.     {"directoryFontNormal", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1263. !      (Cardinal) &(fonts.directory), XtRString, DIRECTORY_NORMAL},
  1264.     {"bothShown", XtCBoolean, XtRBoolean, sizeof(Boolean),
  1265. !      (Cardinal) &both_shown_initial, XtRString, "False"},
  1266.     {"directoryHeight", "DirectoryHeight", XtRInt, sizeof(int),
  1267. !      (Cardinal) &directory_height, XtRString, "150"},  
  1268.     {"topCursor", XtCCursor, XtRCursor, sizeof(Cursor), 
  1269. !      (Cardinal) &(cursors.top), XtRString, XMAN_CURSOR},
  1270.     {"helpCursor", XtCCursor, XtRCursor, sizeof(Cursor),
  1271. !      (Cardinal) &(cursors.help), XtRString, HELP_CURSOR},
  1272.     {"manpageCursor", XtCCursor, XtRCursor, sizeof(Cursor),
  1273. !      (Cardinal) &(cursors.manpage), XtRString, MANPAGE_CURSOR},
  1274.     {"searchEntryCursor", XtCCursor, XtRCursor, sizeof(Cursor),
  1275. !      (Cardinal) &(cursors.search_entry), XtRString, SEARCH_ENTRY_CURSOR},
  1276.     {"helpFile", XtCFile, XtRString, sizeof(char *),
  1277. !      (Cardinal) &(help_file), XtRString, HELPFILE},
  1278.     {"topBox", XtCBoolean, XtRBoolean, sizeof(Boolean),
  1279. !      (Cardinal) &top_box_active, XtRString, "True"},
  1280.   };
  1281.   
  1282.   /*
  1283. --- 31,63 ----
  1284.   
  1285.   static void ArgError();
  1286.   
  1287. ! #define Offset(field) (XtOffset(Xman_Resources *, field))
  1288.   
  1289.   static XtResource my_resources[] = {
  1290.     {"manualFontNormal", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1291. !      Offset(fonts.normal), XtRString, MANPAGE_NORMAL},
  1292.     {"manualFontBold", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1293. !      Offset(fonts.bold), XtRString, MANPAGE_BOLD},
  1294.     {"manualFontItalic", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1295. !      Offset(fonts.italic), XtRString, MANPAGE_ITALIC},
  1296.     {"directoryFontNormal", XtCFont, XtRFontStruct, sizeof(XFontStruct *),
  1297. !      Offset(fonts.directory), XtRString, DIRECTORY_NORMAL},
  1298.     {"bothShown", XtCBoolean, XtRBoolean, sizeof(Boolean),
  1299. !      Offset(both_shown_initial), XtRString, "False"},
  1300.     {"directoryHeight", "DirectoryHeight", XtRInt, sizeof(int),
  1301. !      Offset(directory_height), XtRString, "150"},  
  1302.     {"topCursor", XtCCursor, XtRCursor, sizeof(Cursor), 
  1303. !      Offset(cursors.top), XtRString, XMAN_CURSOR},
  1304.     {"helpCursor", XtCCursor, XtRCursor, sizeof(Cursor),
  1305. !      Offset(cursors.help), XtRString, HELP_CURSOR},
  1306.     {"manpageCursor", XtCCursor, XtRCursor, sizeof(Cursor),
  1307. !      Offset(cursors.manpage), XtRString, MANPAGE_CURSOR},
  1308.     {"searchEntryCursor", XtCCursor, XtRCursor, sizeof(Cursor),
  1309. !      Offset(cursors.search_entry), XtRString, SEARCH_ENTRY_CURSOR},
  1310.     {"helpFile", XtCFile, XtRString, sizeof(char *),
  1311. !      Offset(help_file), XtRString, HELPFILE},
  1312.     {"topBox", XtCBoolean, XtRBoolean, sizeof(Boolean),
  1313. !      Offset(top_box_active), XtRString, "True"},
  1314.   };
  1315.   
  1316.   /*
  1317. ***************
  1318. *** 85,134 ****
  1319.   char ** argv;
  1320.   int argc;
  1321.   {
  1322. !   Widget top_menu;
  1323. ! 
  1324. !   top_menu = XtInitialize(TOPBOXNAME,"XMan", 
  1325. !               xman_options, XtNumber(xman_options),
  1326. !               (unsigned int*) &argc,argv);
  1327.     if (argc != 1) {
  1328.       ArgError(argc, argv);
  1329.       exit(42);
  1330.     }
  1331.   
  1332. !   XtGetApplicationResources( (Widget) top_menu, (caddr_t) NULL, 
  1333.                   my_resources, XtNumber(my_resources),
  1334.                   NULL, (Cardinal) 0);
  1335. -   if (!fonts.normal)
  1336. -     XtError("failed to get the manualFontNormal font");
  1337. -   if (!fonts.bold)
  1338. -     fonts.bold = fonts.normal;
  1339. -   if (!fonts.italic)
  1340. -     fonts.italic = fonts.bold;
  1341. -   if (!fonts.directory)
  1342. -     fonts.directory = fonts.normal;
  1343.   
  1344.   #ifdef DEBUG
  1345.     printf("debugging mode\n");
  1346. -   XSynchronize( XtDisplay(top_menu), TRUE);
  1347.   #endif
  1348.   
  1349. !   /* set default width and height. */
  1350.   
  1351. !   default_width = DisplayWidth(XtDisplay(top_menu), 
  1352. !                    XtDisplay(top_menu)->default_screen);
  1353. !   default_width /= 2; 
  1354. !   default_height=DisplayHeight(XtDisplay(top_menu), 
  1355. !                    XtDisplay(top_menu)->default_screen);
  1356.     default_height *= 3;
  1357.     default_height /= 4;
  1358.   
  1359.     sections = Man();
  1360.   
  1361. !   MakeTopMenuWidget(top_menu);    
  1362. ! 
  1363. !   if (top_box_active) {
  1364. !     XtRealizeWidget(top_menu);
  1365. !     AddCursor(top_menu,cursors.top);
  1366.     }
  1367.     else
  1368.       CreateManpage();
  1369. --- 85,133 ----
  1370.   char ** argv;
  1371.   int argc;
  1372.   {
  1373. !   initial_widget = XtInitialize(NULL, "XMan", 
  1374. !                 xman_options, XtNumber(xman_options),
  1375. !                 (unsigned int*) &argc,argv);
  1376.     if (argc != 1) {
  1377.       ArgError(argc, argv);
  1378.       exit(42);
  1379.     }
  1380.   
  1381. !   XtGetApplicationResources( initial_widget, (caddr_t) &resources, 
  1382.                   my_resources, XtNumber(my_resources),
  1383.                   NULL, (Cardinal) 0);
  1384.   
  1385. +   if (!resources.fonts.normal)
  1386. +     PrintError("Failed to get the manualFontNormal font");
  1387. +   if (!resources.fonts.bold)
  1388. +     resources.fonts.bold = resources.fonts.normal;
  1389. +   if (!resources.fonts.italic)
  1390. +     resources.fonts.italic = resources.fonts.bold;
  1391. +   if (!resources.fonts.directory)
  1392. +     resources.fonts.directory = resources.fonts.normal;
  1393. + 
  1394.   #ifdef DEBUG
  1395.     printf("debugging mode\n");
  1396.   #endif
  1397.   
  1398. ! /*
  1399. !  * Set the default width and height.
  1400. !  * I am not real happy with this method, but it will usually do something
  1401. !  * reasonable, if not the "right" thing.  It is not a real big issue since
  1402. !  * it is easy to change the values with resources or command line options.
  1403. !  * NOTE: if you are in a 100 dpi display you will lose.
  1404. !  */
  1405.   
  1406. !   default_width = DEFAULT_WIDTH;
  1407. !   default_height=DisplayHeight(XtDisplay(initial_widget), 
  1408. !                    XtDisplay(initial_widget)->default_screen);
  1409.     default_height *= 3;
  1410.     default_height /= 4;
  1411.   
  1412.     sections = Man();
  1413.   
  1414. !   if (resources.top_box_active) {
  1415. !     MakeTopMenuWidget();    
  1416.     }
  1417.     else
  1418.       CreateManpage();
  1419. ***************
  1420. *** 138,144 ****
  1421.    * the screen so that if this user does not have a top box then when he
  1422.    * removes all his manual pages we can kill off the xman process.
  1423.    * To make things easier we will consider the top box a shown manual page
  1424. !  * here, but since you cannot remove it, man_page_show only goes to zero when
  1425.    * no top box is present.
  1426.    */
  1427.   
  1428. --- 137,143 ----
  1429.    * the screen so that if this user does not have a top box then when he
  1430.    * removes all his manual pages we can kill off the xman process.
  1431.    * To make things easier we will consider the top box a shown manual page
  1432. !  * here, but since you cannot remove it, man_page_shown only goes to zero when
  1433.    * no top box is present.
  1434.    */
  1435.   
  1436. ***************
  1437. *** 174,180 ****
  1438.   int argc;
  1439.   {
  1440.     int i;
  1441. -   char * prog;
  1442.   
  1443.     static char **syntax, *syntax_def[] = {
  1444.     "-helpfile <filename>",    "Specifies the helpfile to use.",
  1445. --- 173,178 ----
  1446. ***************
  1447. *** 205,217 ****
  1448.     for (i = 1; i < argc ; i++) 
  1449.       (void) printf("This argument is unknown to Xman: %s\n", argv[i]);
  1450.     
  1451. -   if ( (prog = rindex(argv[0], '/')) == NULL)
  1452. -     prog = argv[0];
  1453. - 
  1454.     (void) printf("\nKnown arguments are:\n");
  1455.   
  1456.     while ( *syntax != NULL ) {
  1457. !     printf("%-20s - %s\n", syntax[0], syntax[1]);
  1458.       syntax += 2;
  1459.     }
  1460.   }
  1461. --- 203,212 ----
  1462.     for (i = 1; i < argc ; i++) 
  1463.       (void) printf("This argument is unknown to Xman: %s\n", argv[i]);
  1464.     
  1465.     (void) printf("\nKnown arguments are:\n");
  1466.   
  1467.     while ( *syntax != NULL ) {
  1468. !     printf("%-30s - %s\n", syntax[0], syntax[1]);
  1469.       syntax += 2;
  1470.     }
  1471.   }
  1472. *** /tmp/,RCSt1a17248    Fri Jan  6 18:57:03 1989
  1473. --- clients/xman/search.c    Fri Jan  6 18:42:29 1989
  1474. ***************
  1475. *** 1,7 ****
  1476.   /*
  1477.    * xman - X window system manual page display program.
  1478.    *
  1479. !  * $XConsortium: search.c,v 1.2 88/09/04 20:27:33 swick Exp $
  1480.    * $oHeader: search.c,v 4.0 88/08/31 22:13:19 kit Exp $
  1481.    *
  1482.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  1483. --- 1,7 ----
  1484.   /*
  1485.    * xman - X window system manual page display program.
  1486.    *
  1487. !  * $XConsortium: search.c,v 1.3 89/01/06 18:42:28 kit Exp $
  1488.    * $oHeader: search.c,v 4.0 88/08/31 22:13:19 kit Exp $
  1489.    *
  1490.    * Copyright 1987, 1988 Massachusetts Institute of Technology
  1491. ***************
  1492. *** 21,27 ****
  1493.    */
  1494.   
  1495.   #if ( !defined(lint) && !defined(SABER))
  1496. !   static char rcs_version[] = "$Athena: search.c,v 4.0 88/08/31 22:13:19 kit Exp $";
  1497.   #endif
  1498.   
  1499.   #include "globals.h"
  1500. --- 21,27 ----
  1501.    */
  1502.   
  1503.   #if ( !defined(lint) && !defined(SABER))
  1504. !   static char rcs_version[] = "$Athena: search.c,v 4.7 89/01/06 15:59:02 kit Exp $";
  1505.   #endif
  1506.   
  1507.   #include "globals.h"
  1508. ***************
  1509. *** 35,41 ****
  1510.   #define SEARCHARGS 10
  1511.   
  1512.   FILE * DoManualSearch();
  1513. ! struct entry * BEntrySearch();
  1514.   
  1515.   /*    Function Name: MakeSearchWidget
  1516.    *    Description: This Function Creates the Search Widget.
  1517. --- 35,41 ----
  1518.   #define SEARCHARGS 10
  1519.   
  1520.   FILE * DoManualSearch();
  1521. ! static int BEntrySearch();
  1522.   
  1523.   /*    Function Name: MakeSearchWidget
  1524.    *    Description: This Function Creates the Search Widget.
  1525. ***************
  1526. *** 66,72 ****
  1527.     popup_shell = XtCreatePopupShell(SEARCHNAME, transientShellWidgetClass, 
  1528.                      parent, arglist, num_args);
  1529.   
  1530. !   box = XtCreateWidget("box",boxWidgetClass, popup_shell,NULL,0);
  1531.   
  1532.     num_args = 0;
  1533.     XtSetArg(arglist[num_args], XtNborderWidth, 0);
  1534. --- 66,72 ----
  1535.     popup_shell = XtCreatePopupShell(SEARCHNAME, transientShellWidgetClass, 
  1536.                      parent, arglist, num_args);
  1537.   
  1538. !   box = XtCreateWidget("box",boxWidgetClass, popup_shell,NULL, (Cardinal) 0);
  1539.   
  1540.     num_args = 0;
  1541.     XtSetArg(arglist[num_args], XtNborderWidth, 0);
  1542. ***************
  1543. *** 81,87 ****
  1544.     XtSetArg(arglist[num_args], XtNeditType, XttextEdit);
  1545.     num_args++;
  1546.   
  1547. !   man_globals->search_string = INIT_SEARCH_STRING;
  1548.   
  1549.     XtSetArg(arglist[num_args], XtNstring, man_globals->search_string);
  1550.     num_args++;
  1551. --- 81,87 ----
  1552.     XtSetArg(arglist[num_args], XtNeditType, XttextEdit);
  1553.     num_args++;
  1554.   
  1555. !   strcpy(man_globals->search_string, INIT_SEARCH_STRING);
  1556.   
  1557.     XtSetArg(arglist[num_args], XtNstring, man_globals->search_string);
  1558.     num_args++;
  1559. ***************
  1560. *** 90,96 ****
  1561.   
  1562.     XtSetArg(arglist[num_args], XtNlength, SEARCH_STRING_LENGTH);
  1563.     num_args++;
  1564. !   XtSetArg(arglist[num_args], XtNcursor, cursors.search_entry);
  1565.     num_args++;
  1566.   
  1567.     text = XtCreateWidget("textWidgetSearch",asciiStringWidgetClass,
  1568. --- 90,96 ----
  1569.   
  1570.     XtSetArg(arglist[num_args], XtNlength, SEARCH_STRING_LENGTH);
  1571.     num_args++;
  1572. !   XtSetArg(arglist[num_args], XtNcursor, resources.cursors.search_entry);
  1573.     num_args++;
  1574.   
  1575.     text = XtCreateWidget("textWidgetSearch",asciiStringWidgetClass,
  1576. ***************
  1577. *** 156,172 ****
  1578.   
  1579.     answer = XtMakeResizeRequest(text, width, height, &width, &height);
  1580.       
  1581. !     switch(answer) {
  1582. !     case XtGeometryYes:
  1583. !     case XtGeometryNo:
  1584. !       break;
  1585. !     case XtGeometryAlmost:
  1586. !       (void) XtMakeResizeRequest(text, width, height, &width, &height);
  1587. !     }
  1588.   
  1589.     XtManageChild(box);
  1590.     XtRealizeWidget(popup_shell);
  1591. !   AddCursor(popup_shell,cursors.search_entry);
  1592.   }
  1593.   
  1594.   /*    Function Name: DoSearch
  1595. --- 156,172 ----
  1596.   
  1597.     answer = XtMakeResizeRequest(text, width, height, &width, &height);
  1598.       
  1599. !   switch(answer) {
  1600. !   case XtGeometryYes:
  1601. !   case XtGeometryNo:
  1602. !     break;
  1603. !   case XtGeometryAlmost:
  1604. !     (void) XtMakeResizeRequest(text, width, height, &width, &height);
  1605. !   }
  1606.   
  1607.     XtManageChild(box);
  1608.     XtRealizeWidget(popup_shell);
  1609. !   AddCursor(popup_shell,resources.cursors.search_entry);
  1610.   }
  1611.   
  1612.   /*    Function Name: DoSearch
  1613. ***************
  1614. *** 212,218 ****
  1615.   
  1616.     if (!strcmp(man_globals->search_string,"") || 
  1617.         (man_globals->search_string[0] == ' ')) {
  1618. !     PrintWarning("You want me to search for what???");
  1619.       return(NULL);
  1620.     }
  1621.   
  1622. --- 212,218 ----
  1623.   
  1624.     if (!strcmp(man_globals->search_string,"") || 
  1625.         (man_globals->search_string[0] == ' ')) {
  1626. !     PrintWarning(man_globals, "You want me to search for what???");
  1627.       return(NULL);
  1628.     }
  1629.   
  1630. ***************
  1631. *** 228,235 ****
  1632.       strcpy(path,manpath);
  1633.   
  1634.     if (type == APROPOS) {
  1635. !     sprintf(cmdbuf,"%s %s %s | %s > %s",APROPOSCOMMAND,path,
  1636. !         man_globals->search_string,APROPOSFILTER,mantmp);
  1637.       sprintf(label,"Results of apropos search on: %s",
  1638.           man_globals->search_string);
  1639.   
  1640. --- 228,234 ----
  1641.       strcpy(path,manpath);
  1642.   
  1643.     if (type == APROPOS) {
  1644. !     sprintf(cmdbuf, APROPOSFILTER, path, man_globals->search_string, mantmp);
  1645.       sprintf(label,"Results of apropos search on: %s",
  1646.           man_globals->search_string);
  1647.   
  1648. ***************
  1649. *** 272,278 ****
  1650.       if (flag) {
  1651.         fclose(file);
  1652.         file = NULL;
  1653. - /*    PrintWarning(string_buf); */
  1654.         ChangeLabel(man_globals->label,string_buf);
  1655.         return(NULL);
  1656.       }
  1657. --- 271,276 ----
  1658. ***************
  1659. *** 285,291 ****
  1660.       file = DoManualSearch(man_globals);
  1661.       if (file == NULL) {
  1662.         sprintf(string_buf,"No manual entry for %s.",man_globals->search_string);
  1663. -       /*    PrintWarning(string_buf); */
  1664.         ChangeLabel(man_globals->label,string_buf);
  1665.         return(NULL);
  1666.       }
  1667. --- 283,288 ----
  1668. ***************
  1669. *** 299,338 ****
  1670.    *    Returns: the filename of the man page.
  1671.    */
  1672.   
  1673.   FILE * 
  1674.   DoManualSearch(man_globals)
  1675.   ManpageGlobals *man_globals;
  1676.   {
  1677. !   struct entry * entry = NULL;
  1678. !   char *string, *name;
  1679. !   int i;
  1680. !   FILE * file;
  1681.   
  1682.   /* search current section first. */
  1683.     
  1684.     string = man_globals->search_string;
  1685.     i = man_globals->current_directory;
  1686. !   entry = BEntrySearch(string, manual[i].entries, manual[i].nentries);
  1687.   
  1688.   /* search other sections. */
  1689.   
  1690. !   if (entry == NULL) {
  1691.       i = -1;            /* At the exit of the loop i needs to
  1692.                      be the one we used. */
  1693.       do {
  1694.         i++;
  1695.         if (i == man_globals->current_directory) i++;
  1696. !       entry = BEntrySearch(string, manual[i].entries, manual[i].nentries);
  1697. !     } while ( (i < sections) && (entry == NULL) );
  1698.     }
  1699. !     
  1700. !   if (entry == NULL)
  1701. !     return(NULL);
  1702. ! 
  1703. !   name = CreateManpageName(entry->label);
  1704. !   file = FindFilename(man_globals, name, i, entry);
  1705. !   free(name);
  1706. !   return(file);
  1707.   }
  1708.   
  1709.   /*    Function Name: BEntrySearch
  1710. --- 296,344 ----
  1711.    *    Returns: the filename of the man page.
  1712.    */
  1713.   
  1714. + #define NO_ENTRY -100
  1715. + 
  1716.   FILE * 
  1717.   DoManualSearch(man_globals)
  1718.   ManpageGlobals *man_globals;
  1719.   {
  1720. !   char *string;
  1721. !   int e_num = NO_ENTRY;
  1722. !   int i, initial_entry;
  1723.   
  1724.   /* search current section first. */
  1725.     
  1726.     string = man_globals->search_string;
  1727.     i = man_globals->current_directory;
  1728. !   e_num = BEntrySearch(string, manual[i].entries, manual[i].nentries);
  1729.   
  1730.   /* search other sections. */
  1731.   
  1732. !   if (e_num == NO_ENTRY) {
  1733.       i = -1;            /* At the exit of the loop i needs to
  1734.                      be the one we used. */
  1735.       do {
  1736.         i++;
  1737.         if (i == man_globals->current_directory) i++;
  1738. !       e_num = BEntrySearch(string, manual[i].entries, manual[i].nentries);
  1739. !     } while ( (i < sections) && (e_num == NO_ENTRY) );
  1740. !     if (e_num == NO_ENTRY)
  1741. !       return(NULL);
  1742. ! /*
  1743. !  * Manual page found in some other section, unhighlight the current one.
  1744. !  */
  1745. !     XtListUnhighlight(
  1746. !             man_globals->manpagewidgets.box[man_globals->current_directory]);
  1747.     }
  1748. !   else {
  1749. !     /* 
  1750. !      * Highlight the element we are searching for if it is in the directory
  1751. !      * listing currently being shown.
  1752. !      */
  1753. !    
  1754. !     XtListHighlight(man_globals->manpagewidgets.box[i], e_num);
  1755. !   }
  1756. !   return(FindFilename(man_globals, manual[i].entries[e_num]));
  1757.   }
  1758.   
  1759.   /*    Function Name: BEntrySearch
  1760. ***************
  1761. *** 343,377 ****
  1762.    *    Returns: a pointer to the entry found.
  1763.    */
  1764.   
  1765. ! struct entry *  
  1766.   BEntrySearch(string, first, number)
  1767.   char * string;
  1768. ! struct entry * first;
  1769.   int number;
  1770.   {
  1771. !   int check, cmp;
  1772. !   char * c, label[BUFSIZ];
  1773.     
  1774.     while (TRUE) {
  1775.   
  1776. !     if (number == 0)
  1777. !       return(NULL);        /* didn't find it. */
  1778. !   
  1779.       check = number/2;
  1780.   
  1781. !     strcpy (label, first[check].label);
  1782. !     c = index(label, '.');
  1783. !     if (c != NULL);
  1784. !     *c = '\0';
  1785.   
  1786. !     cmp = strcmp(string, label);
  1787.   
  1788. !     if ( cmp == 0 )
  1789. !       return(&(first[check]));
  1790. !     else if (cmp < 0) 
  1791.         number = check;
  1792. !     else /* cmp > 0 */ {
  1793. !       first = &(first[check + 1]);
  1794.         number -= ( check + 1 );
  1795.       }
  1796.     }
  1797. --- 349,391 ----
  1798.    *    Returns: a pointer to the entry found.
  1799.    */
  1800.   
  1801. ! static int
  1802.   BEntrySearch(string, first, number)
  1803.   char * string;
  1804. ! char ** first;
  1805.   int number;
  1806.   {
  1807. !   int check, cmp, len_cmp, global_number;
  1808. !   char *head, *tail;
  1809.     
  1810. +   global_number = 0;
  1811.     while (TRUE) {
  1812.   
  1813. !     if (number == 0) {
  1814. !       return(NO_ENTRY);        /* didn't find it. */
  1815. !     }
  1816. ! 
  1817.       check = number/2;
  1818.   
  1819. !     head = rindex(first[ global_number + check ], '/');
  1820. !     if (head == NULL) 
  1821. !       PrintError("index failure in BEntrySearch");
  1822. !     head++;
  1823.   
  1824. !     tail = rindex(head, '.');
  1825. !     if (tail == NULL) 
  1826. !       PrintError("index failure in BEntrySearch");
  1827.   
  1828. !     cmp = strncmp(string, head, (tail - head));
  1829. !     len_cmp = strlen(string) - (int) (tail - head);
  1830. ! 
  1831. !     if ( cmp == 0 && len_cmp == 0) {
  1832. !       return(global_number + check);
  1833. !     }
  1834. !     else if ( cmp < 0 || ((cmp == 0) && (len_cmp < 0)) ) 
  1835.         number = check;
  1836. !     else /* cmp > 0 || ((cmp == 0) && (len_cmp > 0)) */ {
  1837. !       global_number += (check + 1);
  1838.         number -= ( check + 1 );
  1839.       }
  1840.     }
  1841. -- 
  1842. Mike Wexler(wyse!mikew)    Phone: (408)433-1000 x1330
  1843. Moderator of comp.sources.x
  1844.